home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / hangman / about.frm next >
Text File  |  1999-09-06  |  4KB  |  125 lines
  1. VERSION 5.00
  2. Begin VB.Form About 
  3.    Appearance      =   0  'Flat
  4.    BackColor       =   &H80000004&
  5.    BorderStyle     =   3  'Fixed Dialog
  6.    ClientHeight    =   1725
  7.    ClientLeft      =   3675
  8.    ClientTop       =   3195
  9.    ClientWidth     =   4155
  10.    ClipControls    =   0   'False
  11.    ControlBox      =   0   'False
  12.    BeginProperty Font 
  13.       Name            =   "MS Sans Serif"
  14.       Size            =   8.25
  15.       Charset         =   0
  16.       Weight          =   700
  17.       Underline       =   0   'False
  18.       Italic          =   0   'False
  19.       Strikethrough   =   0   'False
  20.    EndProperty
  21.    ForeColor       =   &H80000008&
  22.    LinkTopic       =   "Form3"
  23.    MaxButton       =   0   'False
  24.    MinButton       =   0   'False
  25.    PaletteMode     =   1  'UseZOrder
  26.    Picture         =   "About.frx":0000
  27.    ScaleHeight     =   1725
  28.    ScaleWidth      =   4155
  29.    ShowInTaskbar   =   0   'False
  30.    StartUpPosition =   2  'CenterScreen
  31.    Visible         =   0   'False
  32.    Begin VB.CommandButton AboutExit 
  33.       Appearance      =   0  'Flat
  34.       BackColor       =   &H80000005&
  35.       Caption         =   "&OK"
  36.       Default         =   -1  'True
  37.       Height          =   375
  38.       Left            =   3000
  39.       TabIndex        =   0
  40.       Top             =   1200
  41.       Width           =   960
  42.    End
  43.    Begin VB.Label Label4 
  44.       Alignment       =   2  'Center
  45.       BackStyle       =   0  'Transparent
  46.       Caption         =   "Dennis Hallman"
  47.       BeginProperty Font 
  48.          Name            =   "MS Sans Serif"
  49.          Size            =   12
  50.          Charset         =   0
  51.          Weight          =   700
  52.          Underline       =   0   'False
  53.          Italic          =   0   'False
  54.          Strikethrough   =   0   'False
  55.       EndProperty
  56.       ForeColor       =   &H0080C0FF&
  57.       Height          =   375
  58.       Left            =   120
  59.       TabIndex        =   4
  60.       Top             =   1320
  61.       Width           =   2775
  62.    End
  63.    Begin VB.Label Label3 
  64.       Alignment       =   2  'Center
  65.       BackStyle       =   0  'Transparent
  66.       Caption         =   "By"
  67.       ForeColor       =   &H0080C0FF&
  68.       Height          =   255
  69.       Left            =   240
  70.       TabIndex        =   3
  71.       Top             =   1080
  72.       Width           =   2655
  73.    End
  74.    Begin VB.Label Label2 
  75.       Alignment       =   2  'Center
  76.       BackStyle       =   0  'Transparent
  77.       Caption         =   "Version Number"
  78.       ForeColor       =   &H00C0C000&
  79.       Height          =   495
  80.       Left            =   360
  81.       TabIndex        =   2
  82.       Top             =   600
  83.       Width           =   2295
  84.    End
  85.    Begin VB.Label Label1 
  86.       Alignment       =   2  'Center
  87.       Appearance      =   0  'Flat
  88.       BackColor       =   &H80000004&
  89.       BackStyle       =   0  'Transparent
  90.       Caption         =   "Program Title"
  91.       BeginProperty Font 
  92.          Name            =   "MS Sans Serif"
  93.          Size            =   13.5
  94.          Charset         =   0
  95.          Weight          =   700
  96.          Underline       =   0   'False
  97.          Italic          =   0   'False
  98.          Strikethrough   =   0   'False
  99.       EndProperty
  100.       ForeColor       =   &H00C0E0FF&
  101.       Height          =   495
  102.       Left            =   120
  103.       TabIndex        =   1
  104.       Top             =   120
  105.       Width           =   3855
  106.    End
  107. End
  108. Attribute VB_Name = "About"
  109. Attribute VB_GlobalNameSpace = False
  110. Attribute VB_Creatable = False
  111. Attribute VB_PredeclaredId = True
  112. Attribute VB_Exposed = False
  113. Option Explicit
  114.  
  115. Private Sub AboutExit_Click()
  116.     Unload Me
  117. End Sub
  118.  
  119. Private Sub Form_Load()
  120.     About.Label1 = "HANGMAN"
  121.     About.Label2 = "Version 2.0" & vbLf & "Copyright 1999-2000"
  122.     'About.Top = frmHangman.Top + (frmHangman.Height / 2) - About.Height / 2
  123.     'About.Left = frmHangman.Left + (frmHangman.Width / 2) - About.Width / 2
  124. End Sub
  125.